CommonEvent 3162
Name = "人魂娘"

  999([3162])
  ConditionalBranch([0, 26, 1])
    JumpToLabel(["反省会"])
    Empty([])

  BranchEnd([])
  ShowPicture([5, "80_hitodama_st02", 0, 0, 0, 0, 100, 100, 0, 0])
  MovePicture([5, nil, 0, 0, 0, 0, 100, 100, 255, 0, 30, true])
  PlayBGM(["RPG::BGM(@name=\"ero1\", @volume=100, @pitch=100)"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>Ahhh..."])
  ShowText([""])
  ShowTextAttributes(["hitodama_fc1", 1, 0, 2])
  ShowText(["\\n<Hitodama Girl>"])
  ShowText(["Ahaha, I won, right?"])
  ShowText(["Now I get to rape you~♪"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>"])
  ShowText(["Th-that's... Stop..."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["The Hitodama Girl comes up to me, pressing against my body."])
  ShowText(["The texture of her body feels so strange..."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["It's almost fluffy."])
  ShowText(["She's slightly warm, but just feeling her body feels good."])
  ShowTextAttributes(["hitodama_fc1", 1, 0, 2])
  ShowText(["\\n<Hitodama Girl>"])
  ShowText(["It's a rare opportunity to have sex with a ghost, isn't it?"])
  ShowText(["It feels really good, you'll enjoy yourself..."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>"])
  ShowText(["S...Stop... Ahh!"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["With that, she presses down..."])
  PlayBGS(["RPG::BGS(@name=\"mon_hsean05_innerworks_a5\", @volume=80, @pitch=100)"])
  ShowPicture([5, "ev_hitodama_hc1", 0, 0, 0, 0, 100, 100, 0, 0])
  MovePicture([5, nil, 0, 0, 0, 0, 100, 100, 255, 0, 30, true])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["My penis sinks into her vagina!"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>W-What the... This feeling... Ahauu..."])
  ShowText([""])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["The feel of her body is far different from a human's."])
  ShowText(["It feels like my penis is being entangled in her spirit body."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Just coming in contact with her body leaves me weak."])
  ShowText(["A sweet ecstasy fills me along with the weakness..."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>Ahhh... It feels so gooood..."])
  ShowText([""])
  ShowTextAttributes(["hitodama_fc1", 1, 0, 2])
  ShowText(["\\n<Hitodama Girl>"])
  ShowText(["Ufufu... Ghost sex feels good, doesn't it?"])
  ShowText(["Just violating a man for even a moment is enough to make them come~♪"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>Ah... Hauuuu..."])
  ShowText([""])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["It feels like my energy is being absorbed."])
  ShowText(["Soaking in ecstasy, there's no resistance left in me."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["This is sex with a ghost..."])
  ShowText(["The immoral feeling of this pleasure is enough to captivate any man."])
  ShowTextAttributes(["hitodama_fc1", 1, 0, 2])
  ShowText(["\\n<Hitodama Girl>"])
  ShowText(["Human men really are so simple."])
  ShowText(["Just rape them a bit, and they lose all will to resist...♪"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>Uuuhh... That feels good..."])
  ShowText([""])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Her body feels more solid than gas."])
  ShowText(["But the viscous-like stimulation is enough to really press against me."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["The unique, almost ticklish feeling against my glans brings me near a climax."])
  ShowText(["I'm going to come any second at this rate..."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>"])
  ShowText(["Aaah... Coming..."])
  ShowTextAttributes(["hitodama_fc1", 1, 0, 2])
  ShowText(["\\n<Hitodama Girl>"])
  ShowText(["Ahaha, you're a fast one~♪"])
  ShowText(["Go ahead, let out a lot~♪"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["A huge suction pulls on my penis suddenly."])
  ShowText(["Sucking up my energy at the same time, the pleasure is intense."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["I surrender right away to it."])
  ShowText(["I accept the climax building in my body."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>A, aaaaa..."])
  ShowText([""])
  CallCommonEvent([104])
  ShowPicture([5, "ev_hitodama_hc2", 0, 0, 0, 0, 100, 100, 255, 0])
  CallCommonEvent([105])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["My semen shoots into her with each sweet pulse."])
  ShowText(["It feels like her spirit body is sucking everything away from me."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>Huaaa..."])
  ShowText([""])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["My mouth goes loose as I swim in ecstasy."])
  ShowText(["It feels so good, it's as if my soul itself could be taken."])
  ShowTextAttributes(["hitodama_fc1", 1, 0, 2])
  ShowText(["\\n<Hitodama Girl>"])
  ShowText(["Ahaha, does your penis feel good?"])
  ShowText(["Sex with a ghost is the best, right?♪"])
  ShowTextAttributes(["hitodama_fc1", 1, 0, 2])
  ShowText(["\\n<Hitodama Girl>"])
  ShowText(["I'll suck up some more, alright?"])
  ShowText(["It's a special service.♪"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>Th...This can't be... Ahh..."])
  ShowText([""])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Her spirit body sucks on my penis."])
  ShowText(["Along with the suction feeling, more energy flows out of me."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Overcome in pleasure, I'm drowning in it."])
  ShowText(["My hips quiver in bliss as I moan."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>So good... Ahh..."])
  ShowText([""])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Moaning, immersed in ecstasy..."])
  ShowText(["My body itself is twitching in joy, not just my penis."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["The thought of doing this with a ghost before was horrifying..."])
  ShowText(["But now I'm a complete captive of this pleasure."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>Ahh... Ah, ahhh..."])
  ShowText([""])
  ShowTextAttributes(["hitodama_fc1", 1, 0, 2])
  ShowText(["\\n<Hitodama Girl>"])
  ShowText(["Ahaha, your face looks like you're in heaven.♪"])
  ShowText(["Now, come again~♪"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Her spirit body pulls on my penis again."])
  ShowText(["At the same time, the crazy suction gets even more powerful."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>No, coming... Haauu..."])
  ShowText([""])
  CallCommonEvent([104])
  ShowPicture([5, "ev_hitodama_hc3", 0, 0, 0, 0, 100, 100, 255, 0])
  CallCommonEvent([105])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Tasting the heavenly pleasure, I come inside her again."])
  ShowText(["My semen is quickly sucked up into her spirit body."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["At the same time as my orgasm, more energy floods out of me."])
  ShowText(["Already weak, I feel my consciousness starting to fade."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>Fuah... Ahh..."])
  ShowText([""])
  ShowTextAttributes(["hitodama_fc1", 1, 0, 2])
  ShowText(["\\n<Hitodama Girl>"])
  ShowText(["Fufu, did you like having sex with a ghost?"])
  ShowText(["It was amazing, wasn't it?♪"])
  ShowTextAttributes(["hitodama_fc1", 1, 0, 2])
  ShowText(["\\n<Hitodama Girl>"])
  ShowText(["You'll die if I take any more energy, so I'll stop for today."])
  ShowText(["If you want to have sex again, come to me.♪"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>Aah...Aaa..."])
  ShowText([""])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["With my energy taken to the limit, I can barely moan."])
  ShowText(["My view gets dark as I fade into sleep..."])
  ShowTextAttributes(["hitodama_fc1", 1, 0, 2])
  ShowText(["\\n<Hitodama Girl>"])
  ShowText(["Goodnight~♪"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>............"])
  ShowText([""])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["After that, I lost consciousness..."])
  FadeoutScreen([])
  ErasePicture([5])
  ErasePicture([6])
  FadeoutBGS([2])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["When I woke up, I was in the same spot."])
  ShowText(["Just like she said, she didn't kill me, and let me go."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>I-I'm saved..."])
  ShowText([""])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["But the memories of having sex with a ghost won't fade."])
  ShowText(["After tasting that pleasure, it can't be forgotten..."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["I kept going back to her over and over after that."])
  ShowText(["Of course, to keep having sex with her."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["I'm a prisoner to the pleasure of having sex with ghosts..."])
  ShowText(["Thus, I abandon my adventure here..."])
  Label(["反省会"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["・・・・・・・・"])
  FadeoutScreen([])
  FadeoutBGM([1])
  Wait([120])
  Script(["memory_interruption"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["You hear Ilias' voice calling out to you... Receive her evaluation?"])
  ShowText([""])
  ShowChoices([["Receive evaluation", "Change difficulty", "Reincarnate"], 3])
  When([0, "反省会に出る"])
    PlayBGM(["RPG::BGM(@name=\"irias\", @volume=90, @pitch=105)"])
    ShowPicture([1, "bg001", 0, 0, 0, 0, 100, 100, 255, 0])
    FadeinScreen([])
    ShowPicture([5, "80_iriasu_st04", 0, 0, 0, 0, 100, 100, 0, 0])
    MovePicture([5, nil, 0, 0, 0, 0, 100, 100, 255, 0, 30, true])
    ShowTextAttributes(["iriasu_fc1", 3, 0, 2])
    ShowText(["\\n<Ilias>Sex with a soul. How spiritual."])
    ShowText(["Did you open a new door here?"])
    ShowText([""])
    ShowPicture([5, "80_iriasu_st01", 0, 0, 0, 0, 100, 100, 255, 0])
    ShowTextAttributes(["iriasu_fc1", 0, 0, 2])
    ShowText(["\\n<Ilias>It seems like she's the soul of a monster girl."])
    ShowText(["In addition to flame skills, she also uses instant death moves."])
    ShowText([""])
    ShowTextAttributes(["iriasu_fc1", 0, 0, 2])
    ShowText(["\\n<Ilias>Though she's a ghost, she is weak to ice."])
    ShowText(["If you paid attention, her defense isn't very high, so she should be easy to defeat."])
    ShowText([""])
    ShowPicture([5, "80_iriasu_st02", 0, 0, 0, 0, 100, 100, 255, 0])
    ShowTextAttributes(["iriasu_fc1", 1, 0, 2])
    ShowText(["\\n<Ilias>Now go, oh Brave Luka."])
    ShowText(["Push that soul back into the other world."])
    ShowText([""])
    FadeoutBGM([1])
    FadeoutScreen([])
    ErasePicture([5])
    ErasePicture([1])
    Wait([60])
    Empty([])

  When([1, "難易度を変更する"])
    ShowTextAttributes(["", 0, 0, 2])
    ShowText(["Please choose a difficulty level."])
    CallCommonEvent([110])
    Empty([])

  When([2, "輪廻に戻る"])
    Empty([])

  ChoicesEnd([])
  CallCommonEvent([3000])
  Empty([])
